home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / C / Games / Xconq 7.0d16 / lib / quest.g < prev    next >
Encoding:
Text File  |  1993-12-20  |  2.2 KB  |  113 lines  |  [TEXT/MPS ]
  1. (game-module "quest"
  2.   (title "Quest for XP")
  3.   (blurb "Type definitions for fantasy role-playing")
  4.   (variants (see-all false))
  5. )
  6.  
  7. (unit-type human (image-name "person") (char "@"))
  8.  
  9. (unit-type orc)
  10. (unit-type elf)
  11. (unit-type dwarf)
  12. (unit-type bugbear)
  13. (unit-type dragon)
  14.  
  15. (define monster (orc elf dwarf bugbear dragon))
  16. (define animate (append human monster))
  17.  
  18. (material-type food)
  19. (material-type water)
  20. (material-type gold)
  21.  
  22. (include "stdterr")
  23.  
  24. ;;; Static relationships.
  25.  
  26. (include "ng-weird")
  27.  
  28. (add human namer "generic-names")
  29.  
  30. (add human possible-sides "human")
  31.  
  32. (add monster possible-sides "monster")
  33.  
  34. (add human storage 100)
  35.  
  36. (table material-size-in-unit
  37.   (human m* (10 20 1))
  38.   )
  39.  
  40. ;;; Action parameters.
  41.  
  42. (add u* acp-per-turn 4)
  43.  
  44. ;;; Movement parameters.
  45.  
  46. (table mp-to-enter-terrain
  47.   (u* mountains 10)
  48.   (dragon mountains 0)
  49.   )
  50.  
  51. ;;; Combat parameters.
  52.  
  53. (add u* hp-max 10)
  54.  
  55. (table hit-chance
  56.   (u* u* 50)
  57.   )
  58.  
  59. (table damage
  60.   (u* u* 1)
  61.   )
  62.  
  63. ;;; Backdrop activities.
  64.  
  65. (add u* hp-recovery 100)
  66.  
  67. ;;; Random setup.
  68.  
  69. ;;; One adventurer on a side.
  70.  
  71. (add human start-with 1)
  72.  
  73. (add monster start-with 2)
  74.  
  75. (set country-radius-min 4)
  76. (set country-separation-min 15)
  77. (set country-separation-max 20)
  78.  
  79. (table favored-terrain
  80.   (u* (sea shallows) 0) 
  81.   (u* plains 100)
  82.   )
  83.  
  84. ;(set synthesis-methods
  85. ;  '(make-maze-terrain make-countries make-independent-units))
  86.  
  87. (set sides-min 1)
  88.  
  89. (side 1 (name "You") (class "human"))
  90.  
  91. (side 2 (noun "Monster") (class "monster") (emblem-name "none"))
  92.  
  93. (scorekeeper (do last-side-wins))
  94.  
  95. (game-module (notes (
  96.   "This is a sort of outdoors adventure for individual adventurers."
  97.   )))
  98.  
  99. ;;; Can live off friendly terrain, else must carry n days of food/water.
  100. ;;; Various pieces of equipment available.
  101.  
  102. ;;; Have nobrains machine-run sides for countries, towns, castles, etc.
  103. ;;; (or quiescent unless player becomes outlaw?)
  104.  
  105. ;;; Monsters belong to sides defined by alignment.  Sides of matching
  106. ;;; alignment friendly, etc.  No brains to side, but player could run
  107. ;;; a monster side, just for fun.
  108. ;;; Monsters can breed periodically, but limit total # somehow.
  109.  
  110. ;;; Win by collecting the most treasure after <n> turns.
  111. ;;; Treasure should be hidden inside towns, carried by monsters.
  112.  
  113.